home *** CD-ROM | disk | FTP | other *** search
- object frmProperties: TfrmProperties
- Left = 13
- Top = 48
- Width = 361
- Height = 396
- BorderIcons = [biSystemMenu]
- Caption = 'frmProperties'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- OldCreateOrder = True
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object nbkProperties: TTabbedNotebook
- Left = 0
- Top = 0
- Width = 353
- Height = 366
- Align = alClient
- TabFont.Charset = DEFAULT_CHARSET
- TabFont.Color = clBtnText
- TabFont.Height = -11
- TabFont.Name = 'MS Sans Serif'
- TabFont.Style = []
- TabOrder = 0
- object TTabPage
- Left = 4
- Top = 24
- Caption = 'General'
- object bvlProperties1: TBevel
- Left = 8
- Top = 68
- Width = 325
- Height = 1
- end
- object lblFileName: TLabel
- Left = 100
- Top = 28
- Width = 54
- Height = 13
- Caption = 'lblFileName'
- end
- object imgProperties: TImage
- Left = 24
- Top = 20
- Width = 33
- Height = 37
- end
- object pnlTypeName: TLabel
- Left = 16
- Top = 84
- Width = 27
- Height = 13
- Caption = 'Type:'
- end
- object pnlLocationName: TLabel
- Left = 16
- Top = 104
- Width = 44
- Height = 13
- Caption = 'Location:'
- end
- object pnlSizeName: TLabel
- Left = 16
- Top = 124
- Width = 23
- Height = 13
- Caption = 'Size:'
- end
- object lblType: TLabel
- Left = 100
- Top = 84
- Width = 34
- Height = 13
- Caption = 'lblType'
- end
- object lblLocation: TLabel
- Left = 100
- Top = 104
- Width = 51
- Height = 13
- Caption = 'lblLocation'
- end
- object lblSize: TLabel
- Left = 100
- Top = 124
- Width = 30
- Height = 13
- Caption = 'lblSize'
- end
- object bvlProperties2: TBevel
- Left = 8
- Top = 152
- Width = 325
- Height = 1
- end
- object lblCreatedName: TLabel
- Left = 16
- Top = 168
- Width = 62
- Height = 13
- Caption = 'First Created:'
- end
- object lblAccessedName: TLabel
- Left = 16
- Top = 208
- Width = 50
- Height = 13
- Caption = 'Accessed:'
- end
- object lblModifiedName: TLabel
- Left = 16
- Top = 188
- Width = 66
- Height = 13
- Caption = 'Last Modified:'
- end
- object lblCreated: TLabel
- Left = 100
- Top = 168
- Width = 47
- Height = 13
- Caption = 'lblCreated'
- end
- object lblAccessed: TLabel
- Left = 100
- Top = 208
- Width = 57
- Height = 13
- Caption = 'lblAccessed'
- end
- object lblModified: TLabel
- Left = 100
- Top = 188
- Width = 50
- Height = 13
- Caption = 'lblModified'
- end
- object Bevel1: TBevel
- Left = 8
- Top = 232
- Width = 325
- Height = 1
- end
- object chkReadOnly: TCheckBox
- Left = 80
- Top = 248
- Width = 97
- Height = 17
- Caption = 'ReadOnly'
- TabOrder = 0
- end
- object chkHidden: TCheckBox
- Left = 80
- Top = 276
- Width = 97
- Height = 17
- Caption = 'Hidden'
- TabOrder = 1
- end
- object chkSystem: TCheckBox
- Left = 188
- Top = 248
- Width = 97
- Height = 17
- Caption = 'System'
- TabOrder = 2
- end
- object chkArchive: TCheckBox
- Left = 188
- Top = 276
- Width = 97
- Height = 17
- Caption = 'Archive'
- TabOrder = 3
- end
- object barProperties: TSpeedBar
- Left = 0
- Top = 309
- Width = 345
- Height = 29
- Hint = '|Right-click for toolbar options'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = 'Comic Sans MS'
- Font.Style = []
- Align = alBottom
- Options = [sbFlatBtns]
- BtnOffsetHorz = 3
- BtnOffsetVert = 3
- BtnWidth = 24
- BtnHeight = 23
- Images = frmMain.lstImages
- BevelOuter = bvNone
- PopupMenu = pumToolBar
- TabOrder = 4
- InternalVer = 1
- object secFile: TSpeedbarSection
- Caption = 'File'
- end
- object btnOK: TSpeedItem
- Caption = 'Close'
- Hint = 'Close properties'
- ImageIndex = 50
- Spacing = 1
- Left = 315
- Top = 3
- Visible = True
- OnClick = btnOKClick
- SectionName = 'File'
- end
- end
- end
- end
- object pumToolBar: TPopupMenu
- Left = 296
- Top = 44
- object mniExplore: TMenuItem
- Caption = 'I&Explorer Style'
- Checked = True
- GroupIndex = 3
- Hint = 'Display tool bars with flat buttons'
- RadioItem = True
- OnClick = UpdateMenus
- end
- object mniStandard: TMenuItem
- Tag = 1
- Caption = '&Standard Style'
- GroupIndex = 3
- Hint = 'Display tool bars with raised buttons'
- RadioItem = True
- OnClick = UpdateMenus
- end
- end
- object strEmail: TFormStorage
- IniFileName = '\Software\JSoft Consulting\NotePads+'
- IniSection = 'Properties'
- UseRegistry = True
- StoredProps.Strings = (
- 'mniExplore.Checked'
- 'mniStandard.Checked'
- 'barProperties.Options')
- Left = 268
- Top = 44
- end
- end
-